Fortran 实数的类别

real(4) :: a1 ! 一般默认 4 字节
real(8) :: a2 ! 双精度，8 字节

为了提高可移植性，可以指定一个有名常量，并且使用它定义，例如

integer, parameter :: sgl = 4, dbl = 8
real(sgl) :: a1

也可以声明实常量的类别：

34._4 ! 4 字节实数
34.E3 ! 单精度数
34.D3 ! 双精度数
123.4_dbl ! 利用整型常量